5 GOSUB41000 6 GOSUB1000 8 PRINT"";:FOR B=1 TO 12:PRINT" ";:NEXT 10 D=PEEK(186):IF D<8 THEN D=8 20 A$="EZ F KEYS V3.BAS":POKE53280,4 30 B$="L[207]A$,D"+CHR$(13)+"R[213]"+CHR$(13) 40 FORX=1TO10:POKE630+X,ASC(MID$(B$,X)):NEXT 50 POKE198,10:PRINT"[144]"; 60 END 1000 POKE214,3:PRINT:PRINTTAB(4)"[212]HIS PROGRAM DOES NOT RETURN 1001 [153][163]12)"TO (null)(null)ATNSTR$(null)(null)ATN(null)" 1002 [143] PRINT" AND USES DISK DRIVE DEVICE NUMBER 8" 1003 [153]:[153][163]7)"(null)RESS <(null)> TO (null)UIT (null)OW" 1004 [153][163]3)"(null)RESS ANY OTHER KEY TO CONTINUE." 1005 [151]198,0:[146]198,1:[161]Z$:[139]Z$[179][177]"Q"[167] [142] 1006 [137]40000 10000 N$[178]"B.EZ F KEYS V3":D[178][194](186):[139] D[179]8 [167] D[178]8 10010 [160]15:[159]15,D,15,"S0:"[170]N$:[160]15:[148] N$,D:[149] N$,D:[128] 40000 DV[178][194](186):[139] DV[179]8 [167] DV[178]8 40005 [129]I[178]0[164]21:[151]828[170]I,8[170]I:[130] 40010 [139]DV[179]8[176]DV[177]29[176]DV[178]8[167]40030 40020 A[178][194](828):B[178][194](828[170]DV[171]8):[151]828,B:[151]828[170]DV[171]8,A 40030 A$[178]"HELLO CONNECT":[129]J[178]8[164]29:I[178][194](828[170]J[171]8):[139]I[178]14[167][130] 40040 [160]2:[159]2,I,2:[160]2:[139]ST[167]40060 40050 [160]15:[159]15,I,15,"R0:"[170]A$[170]"="[170]A$:[132]15,ER:[160]15:[139]ER[178]63[167]40070 40060 [130]:[153]"LOADVALRROR!":[151]53272,23:[151]186,8:[128] 40070 Q$[178][199](34):[151]646,[194](53281):[153]"LOAD":[151]53272,23 40080 [153]"LOADP(null)2048,0:P(null)44,8:P(null)43,1:P(null)56,160:P(null)55,0:CLR:L(null)"Q$A$Q$","I 40090 [153]"RUN:":[151]631,13:[151]632,13:[151]198,2:[128] 41000 [151]53280,0:[151]53281,0:[151]53272,22:[153]"LOAD" 41002 [151]214,14:[153] 41004 [153][163]1)"LIST " 41005 [129]X[178]1[164]6 41006 [153][163]1)"PRINT# " 41007 [130] 41013 [153][163]1)"POKE " 41020 [140]:[129]X[178]1[164]4:[135]A$:[151]214,15[170]X:[153] 41022 [153][163]19[171][195](A$)[173]2)"PRINT#"A$ 41024 [130] 41030 T[178]TI[170]60 41031 [139]T[177]TI[167]41031 41032 [153]"":[142] 41050 [131]"VAL(null) ASC (null)VAL(null)(null) (null)3 41051 DATA"[202]AMES [212]. [202]ONES 41052 [131]"(C) 2003 BY MID$ & ASC (null)UBLISHING, RIGHT$NC. 41053 DATA"WWW.LOADSTAR.COM